assume cs:codesg, ss:stacksg, ds:datasg

stacksg segment
dw 0, 0, 0, 0, 0, 0, 0, 0
stacksg ends

datasg segment
db '1. display      '
db '2. brows        '
db '3. replace      '
db '4. modify       '
datasg ends

codesg segment
start:  mov ax, stacksg
        mov ss, ax
        mov ax, datasg
        mov ds, ax
        mov sp, 16
        mov cx, 4
        mov bx, 0

   s0:  push cx
        mov cx, 4
        mov si, 0

   s1:  mov al, [bx + si + 3]
        and al, 11011111B
        mov [bx + si + 3], al
        inc si
        loop s1

        add bx, 16
        pop cx
        loop s0

        mov ax, 4C00H
        int 21H
codesg ends

end start

